home *** CD-ROM | disk | FTP | other *** search
- object Form3: TForm3
- Left = 200
- Top = 168
- BorderStyle = bsDialog
- ClientHeight = 199
- ClientWidth = 323
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = []
- Position = poScreenCenter
- Scaled = False
- OnActivate = FormActivate
- OnClose = FormClose
- OnShow = FormCreate
- PixelsPerInch = 96
- TextHeight = 15
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 323
- Height = 199
- Align = alClient
- Stretch = True
- end
- object DriveComboBox1: TDriveComboBox
- Left = 24
- Top = 160
- Width = 177
- Height = 20
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnChange = DriveComboBox1Change
- end
- object DirectoryListBox1: TDirectoryListBox
- Left = 24
- Top = 56
- Width = 177
- Height = 97
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 2
- OnChange = DirectoryListBox1Change
- end
- object OKButton: TButton
- Left = 226
- Top = 32
- Width = 75
- Height = 25
- Caption = '&OK'
- Default = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = OKButtonClick
- end
- object CancelButton: TButton
- Left = 226
- Top = 64
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = CancelButtonClick
- end
- object EditDir1: TEdit
- Left = 26
- Top = 24
- Width = 175
- Height = 22
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- Text = 'C:\'
- end
- object NewButton: TButton
- Left = 226
- Top = 96
- Width = 75
- Height = 25
- Caption = 'NewButton'
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- Visible = False
- end
- end
-